home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 161 / 161.d81 / b.ten thousand (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  625b  |  17 lines
  1. 8 dv=peek(186):ifdv<8thendv=8
  2. 10 poke53281,0:poke53280,0:print"[147]";
  3. 60000 print"[147]":z$=" [154][167][167][167]                                [165][165][165]":poke214,10:print
  4. 60010 print" [159][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]":fori=0to11:printz$:next
  5. 60020 print" [185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][154]"
  6. 60030 z$(0)="* [212][197][206] [212][200][207][213][211][193][206][196] *":z$(2)="by [212]. [204]. [198]lynn"
  7. 60040 z$(4)="([195]) 1997 by [202] & [198] [208]ublishing"
  8. 60050 z$(6)="[212]his program is not shareware
  9. 60070 z$(7)[178]"or in the public domain."
  10. 60080 z$(9)[178]"1-800-594-3370 or 1-318-221-8718"
  11. 60090 [151]214,12:[153]
  12. 60100 [129]i[178]0[164]9:[153][163]20[171]([195](z$(i))[173]2))""z$(i):[130]
  13. 60110 [151]43,1:[151]44,16:[151]4096,0
  14. 60120 [153]"stopload"[199](34)"ten thousand"[199](34)","dv
  15. 60130 [153]"run"
  16. 60140 [151]631,13:[151]632,13:[151]198,2:[128]
  17.